Labels:text | electronics | screenshot | display | software | computer OCR: Forml: TPorml; implementation procedaro TForm1. BuctoniClick [Bonder: gobject); begin if MessageDlg( close this: form?", corsiort minformation : THacDigType INConfunmalion TMo DiTynn maCustom : ThicDigType Figure 5: Press Ctt Specs to see the list of expressions valid in the current context.